╘HE ┬┴╙╔├ PORTION OF THIS PROGRAM HAS THE LINES NUMBERED FROM 1 TO 228 IN INCREMENTS OF 1. ╘HIS WAS DONE SINCE MODIFYING IT EITHER BY ADDING TO, OR DELETING FROM IT, IS NOT FEASABLE BECAUSE THE ═╠ ROUTINES ARE APPENDED TO THE ┬┴╙╔├ PROGRAM. ═AKING CHANGES TO THE ┬┴╙╔├ PROGRAM WILL CAUSE THE ═╠ TO BE RELOCATED, AND RESULT IN A PROGRAM CRASH UNLESS IT IS RE-ASSEMBLED TO RUN IN THE NEW LOCATION.
╞OR THE EXPERIENCED PROGRAMMER WHO WOULD LIKE TO TRY MODIFYING THIS PROGRAM, THE INFORMATION CONTAINED HEREIN, WHICH INCLUDES THE HEAVILY COMMENTED SOURCE CODE FOR ALL THE ═╠ ROUTINES, SHOULD PROVIDE ALL THE INFORMATION NECESSARY. ╘HE SOURCE CODE WAS GENERATED USING THE "╞┴╙╘ ┴╙╙┼═┬╠┼╥" FROM ├╧═╨╒╘┼!S ╟┴┌┼╘╘┼, ╩AN 86.
┬┴╙╔├ ╨╧╥╘╔╧╬:
--------------
╘HE PROGRAM, AS LOADED, STARTS AT 2049 ($0801) AND ENDS AT 14187 ($376┬). ╘HE ┬┴╙╔├ PORTION ENDS AT 11761 ($2─╞1).
═╠ ╥╧╒╘╔╬┼╙:
------------
═╔'╙ ─╔╥┼├╘╧╥┘:
╠OCATES AT 11761 ($2─╞1)
╓ARIABLE USED TO CALL FROM ┬┴╙╔├ = ═─.
╨REPARATION PRIOR TO CALLING: ╬ONE
─ATA RETURNED TO ┬┴╙╔├:
598 ($0256) ═AIN ═ENU ╞LAG. 34 = GET MENU.
599 (#0257) ╬UMBER OF DIFFERENT ╙┼╤ FILES FOUND.
580-597($0244-$0255) ╚OLDS THE FILENAME SELECTED,
DELIMITED WITH A SINGLE QUOTE (").
═EMORY USED OUTSIDE PROGRAM AREA:
32768-33023 ($8000-8400) ╚OLDS THE FILENAMES CURRENTLY
BEING DISPLAYED ON THE SCREEN. ┼ACH FILENAME IS
DELIMITED WITH A SINGLE QUOTE(").
╙╬┴╨ ╙╚╧╘:
╠OCATES AT 12937 ($2╞3┼)
╓ARIABLES USED TO CALL FROM ┬┴╙╔├: ╙AVE = ╙╨; ╥ECALL = ╟╨.
╨REPARATION PRIOR TO CALLING: ╙TORE THE ╚╔ ┬YTE OF THE
LOCATION TO SAVE OR RECALL IN LOCATION 150 ($96).
─ATA RETURNED TO ┬┴╙╔├: ╬ONE
═EMORY USED OUTSIDE PROGRAM AREA:
2╦ BLOCK AS SELECTED BY THE VALUE IN 150($96).
╬OTE: ╔F THE ROUTINE IS CALLED WITHOUT A VALUE IN 150, THE
ROUTINE JUMPS TO AN ╥╘╙. ┴FTER EACH CALL, LOCATION
150 IS SET TO ZERO.
├╒╥╘┴╔╬╙:
╠OCATES AT 13069 ($330─)
╓ARIABLES USED TO CALL FROM ┬┴╙╔├:
╧PEN ├URTAIN=╧├; ├LOSE ├URTAIN=├├.
╨REPARATION PRIOR TO CALLING:
╙TORE CURTAIN SPEED IN 787($0313). 0-255 0=╞AST.
╙TORE THE COLOR FOR THE CHARACTER IN 2($02). 0-15.
─ATA RETURNED TO ┬┴╙╔├: ╬ONE
═EMORY USED OUTSIDE PROGRAM AREA: ╬ONE.
2 ├╧╠ ╥┼┴─:
╠OCATES AT 13305 ($33╞9)
╓ARIABLES USED TO CALL FROM ┬┴╙╔├:
╘O START=├╥; ╫ORD-╫RAP=╫╫.
╨REPARATION PRIOR TO CALLING: ╬ONE
─ATA RETURNED TO ┬┴╙╔├: ╬ONE
═EMORY USED OUTSIDE PROGRAM AREA: ╬ONE
╬OTE: ╘HE FIRST THREE BYTES ARE USED FOR VARIABLE STORAGE.
╥┼┴─/╨╥╔╬╘/╙├╥╧╠╠:
╠OCATES AT 13459 ($3493)
╓ARIABLES USED TO CALL FROM ┬┴╙╔├:
╘O ╙TART=╥╨; ╙CROLL ╧NLY=╙╧
╨REPARATION PRIOR TO CALLING:
╘HE CHANNEL TO THE DRIVE AND PRINTER MUST BE OPENED
USING THE LOGICAL FILE NUMBER 2 FOR THE DRIVE AND 4
FOR THE PRINTER. ─ATA IS PASSED TO THE ROUTINE VIA THE
╙┘╙ STATEMENT- ╙┘╙╥╨,┴,┬,├,─,┼ WHERE:
╥╨ = ├ALL ADDRESS.
┴ = ╬UMBER OF CHARACTER PER LINE.
┬ = 0=USE <├╥>; 1=╔GNORE <├╥>.
├ = 1=╘O ╨RINTER;0=╘O SCREEN ╧NLY.
─ = ╬UMBER OF SPACES FOR LEFT MARGIN
┼ = 1=PREFORMATTED TEXT; 0=ENABLE AUTO PERF SKIP
─ATA RETURNED TO ┬┴╙╔╙: ╬ONE
═EMORY USED OUTSIDE PROGRAM AREA:
3,4,5,6,176,177,178, & 179 = ╓ECTORS FOR ╔╬─╔╥┼├╘ ┘
ADDRESSING.
155, 165, & 820 = ╞LAGS
512-530 ($0200-$0212) ╘EMPORARY STORAGE FOR ╫ORD-╫RAP.
╬OTE: ┴FTER RETURN TO ┬┴╙╔├, FILES MUST BE CLOSED WITH:
├╠╧╙┼2:├╠╧╙┼4:╙┘╙65511.
┼┌─╔╥:
╠OCATES AT 13987 ($36┴3)
╓ARIABLE USED TO CALL FROM ┬┴╙╔├ = ┼┌
╨REPARATION PRIOR TO CALLING: ╬ONE
─ATA RETURNED TO ┬┴╙╔├: ╬ONE
═EMORY USED OUTSIDE PROGRAM AREA: ╬ONE
┼╥╥╧╥ ═┼╙╙┴╟┼ ╓┼├╘╧╥:
╠OCATES AT 14169 ($3759)
╓ARIABLE USED TO CALL FROM ┬┴╙╔├ = ┼╥.
╬OTE: ╘HIS PATCH IS USED TO TRAP THE "─┼╓╔├┼ ╬╧╘ ╨╥┼╙┼╬╘"
ERROR MESSAGE WHEN THE WRONG DEVICE NUMBER IS
SELECTED AND PREVENTS THE PROGRAM FROM TERMINATING.